home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / PROGTOOL / FST30A.ZIP;1 / MYLISTS.DEF < prev    next >
Encoding:
Modula Definition  |  1992-09-20  |  760 b   |  39 lines
  1. DEFINITION MODULE MyLists;
  2.  
  3. (* (C) Copyright 1992 Fitted Software Tools. All rights reserved. *)
  4.  
  5. FROM Lists      IMPORT LinkedListItem, LinkedList;
  6.  
  7.  
  8. (* DEFINITION *) CLASS MyLinkedListItem;
  9. (*
  10.     MyLinkedListItem adds the print method to LinkedListItem.
  11. *)
  12.  
  13.     INHERIT LinkedListItem;
  14.  
  15.     PROCEDURE print;
  16.     (*
  17.         This method is intended to be redefined in classes derived
  18.         from this one.
  19.  
  20.         In the implementation of MyLinkedListItem, this method does
  21.         nothing.
  22.     *)
  23.  
  24. END MyLinkedListItem;
  25.  
  26.  
  27.  
  28. (* DEFINITION *) CLASS MyLinkedList;
  29. (*
  30.     MyLinkedList is like LinkedList. We define this new class for
  31.     consistency sake only.
  32. *)
  33.  
  34.     INHERIT LinkedList;
  35.  
  36. END MyLinkedList;
  37.  
  38.  
  39. END MyLists.